home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / efs / fixup.el.z / fixup.el
Encoding:
Text File  |  1998-05-21  |  1.2 KB  |  39 lines
  1. ;; -*-Emacs-Lisp-*-
  2. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3. ;;
  4. ;; File:         fixup.el
  5. ;; Release:      $efs release: 1.15 $
  6. ;; Version:      #Revision: 1.1 $
  7. ;; RCS:          
  8. ;; Description:  Fix up the load path for batch byte compilation of efs.
  9. ;; Author:       Andy Norman, Dawn
  10. ;; Created:      Sat Jan 30 00:21:33 1993
  11. ;; Modified:     Fri Sep 16 20:01:50 1994 by sandy on ibm550
  12. ;; Language:     Emacs-Lisp
  13. ;;
  14. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  15.  
  16. (setq load-path
  17.       (append (list (substitute-in-file-name "$CWD")
  18.             (substitute-in-file-name "$BDIR")
  19.             (substitute-in-file-name "$VMDIR")
  20.             )
  21.           load-path))
  22.  
  23. (setq byte-compile-warnings t)
  24.  
  25. ;; If the V18 btye-compiler is being used, this won't be around, so don't
  26. ;; complain if we can't find it.
  27. (load "bytecomp-runtime" t t)
  28.  
  29. (load "bytecomp" nil t)
  30.  
  31. ;; It seems efs causes the standard byte compiler some grief here.
  32. (setq max-lisp-eval-depth (* 2 max-lisp-eval-depth))
  33.  
  34. ;; If the user has the standard dired loaded, having dired
  35. ;; featurep will cause efs-dired.el to attempt to do overloads.
  36. (delq 'dired features)
  37.  
  38. ;;; end of fixup.el
  39.